<?php
/**
 * Created by PhpStorm.
 * User: Administrator
 * Date: 2018/11/13
 * Time: 14:27
 */

namespace app\index\controller;

use app\common\controller\PayBase;
use think\Db;
use app\index\model\ChongzhiList;
use think\Exception;

class Payxb extends PayBase{
    protected $partner;
    protected $key;
    protected $pay_url;
    protected $back_url;
    protected $href_url;

    public function __construct() {
        parent::__construct();
        $this->partner = '600104040';
        $this->key = '3D6712BB6E3D1D6C30098306662589BE';
        $this->pay_url = 'https://api.shaimeixiong.com/api/receive?type=json';
        $this->back_url = 'http://www.my67.cc/index/Payxb/callBack';
        $this->href_url = $_SERVER['REQUEST_SCHEME'].'://'.$_SERVER['HTTP_HOST'].'/index/Payxb/hrefUrl';
    }

    public function initPay($username='',$pay_type='',$amount=-1,$from=0){

        //接收数据
        $user = cookie('username','');
        $password = cookie('password','');
        $username =  empty($username) ? input('post.username','') : $username;
        $pay_type = empty($pay_type) ? input('post.pay_type','') : $pay_type;
        $amount = -1==$amount ? input('post.amount',0) : $amount;
        $ctime = time();

        if($pay_type=='null' || $pay_type=='') return packJson('',$pay_type.'请选择支付方式',500);
        $pay_method = Db::name('pay_type_list')
            ->alias("a")
            ->join('__PAY_METHOD__ b','a.method_id=b.id','LEFT')
            ->where(['a.method'=>13,'a.type_value'=>$pay_type])
            ->field('a.type_name,b.name,b.id,b.method,b.money')->find();

        $remark = $pay_method['type_name'].'-'.$pay_method['name'];
        //验证用户信息
        if( 0==$from ){
            if(!$user || !$username || ($user!=$username)) return packJson('','用户身份验证失败',500);
            $user_info = Db::name('username')->field('id,us_class,swzh,nbzh')->where(['username'=>$username,'password'=>$password])->find();
        }else{
            $user_info = Db::name('username')->field('id,us_class,swzh,nbzh')->where(['username'=>$username])->find();
        }

        if(!$user_info) return packJson('','用户身份验证失败',500);
        if($user_info['swzh'] == 1) return packJson('','试玩账号无法充值',500);
        if($user_info['nbzh'] == 1) return packJson('','内部账号不支持线上充值',500);

        //充值防骚扰是否开启，并进行处理
        $harassment = Db::name('xt_czfsr')->find();
        if($harassment['open'] > 0) {
            $nowys = $ctime - $harassment['time_xs'] * 60;
            $old_czjl = Db::name('chongzhi_list')->where('username',$username)->where('cztime','>',$nowys)->find();
            if($old_czjl['id'] > 0) {
                return packJson('',"系统充值防骚扰已开启，{$harassment['time_xs']}分钟内只能充值1次！",500);
            }
        }

        //验证金额
//        if($amount <= 0) return packJson('','请输入充值金额',500);
//        if($amount < 10) return packJson('','最低充值金额为十元人民币',500);
//        if($amount > 5000) return packJson('','充值金额超过范围',500);

        //生成订单号
        $order_sn = 'XXB' . str_pad($user_info['id'],5,'0',STR_PAD_LEFT) . $ctime . rand(111,999);
        //组装数据
        if( 1==$from ) $this->href_url.="Third";
        $data = array();
        $millisecond = self::getMillisecond();
        $data['merchantId'] = $this->partner;            #商户号
        $data['paytype'] = $pay_type;
        $data['type'] = 'json';
        $data['money'] = $amount;                 #金额 (元)
        $data['timestamp'] = $millisecond;
        $data['goodsName'] = '小熊宝线上充值';
        $data['merchantOrderId'] = $order_sn;           #订单号
        $data['notifyURL'] = $this->back_url;     #下行异步通知过程接口
        $data['returnURL'] = $this->href_url;     #下行同步通知过程接口
        $data['merchantUid'] = $user_info['id'];
        $data['sign'] = md5($amount.'&'.$this->partner.'&'.$this->back_url.'&'.$this->href_url.'&'.$order_sn.'&'.$millisecond.'&'.$this->key);
        $res =  self::request_post($this->pay_url,$data);
        $res = json_decode($res,true);
        $status = isset($res['code']) ? $res['code'] : '';

        if( '10000'==$status ){
            $u = Db::name('username')->where('username',$username)->value('je');
            $model = new ChongzhiList();
            if( $model->setTransRechargeInfo($order_sn,$amount,$username,0,0,1,$remark,$ctime,'小熊宝线上支付','系统自动',get_ip(),0,$pay_type,0,0,0,0,$user_info['us_class'],'',0,0,$u) ){
            //跳转支付页
                $pay_url = $res['payURL'];
                return packJson($pay_url,'',200);
            }else{
                return packJson('',"订单生产错误",500);
            }
        }else{
            return packJson('',$res['message'],500);
        }
    }
    public function callBack(){
        $orderNo = input('orderNo','');
        $merchantOrderNo = input('merchantOrderNo','');
        $money = input('money',0);
        $payAmount = input('payAmount',0);
        $sign = input('sign','');

        $key = md5($orderNo.'&'.$merchantOrderNo.'&'.$money.'&'.$payAmount.'&'.$this->key);
        if ($key != $sign){
            return self::jsonError("key值不匹配");
        }else{
            //校验key成功，是自己人。执行自己的业务逻辑：加余额，订单付款成功，装备购买成功等等。
            //更新用户金额、打码量等相关信息
            $on_money = $money;
            $on_order_no = $orderNo;
            $off_order_no = $merchantOrderNo;
            if( empty($on_order_no) || empty($off_order_no) ){
                return self::jsonError("订单号信息错误");
            }
            $order_info = Db::name('chongzhi_list')->where('ddbh',$off_order_no)->find();

            if( $order_info['je']!=$on_money ) return self::jsonError("金额不匹配");

            Db::startTrans();
            try {
                if( 1==intval($order_info['zt']) ){
                    throw new Exception("该订单已经成功通知");
                }
                $user_info = Db::name('username')->where('username',$order_info['username'])->find();
                //计算优惠金额
                $msje = $msbs = 0;
                $cz_set = Db::name('xt_chongzhi')->find();
                $user_class = Db::name('us_class')->where('id',$user_info['us_class'])->find();
                $zsje = $payAmount * $user_class['czzsbl'] / 100;
                $zsbs = $user_class['czzsbl'];
                if($payAmount >= $cz_set['xscz_je']) {
                    $msje = $payAmount * $cz_set['xscz_zs'] / 100;
                    $msbs = $cz_set['xscz_zs'];
                }
                //充值方案赠送
                $pay_method = Db::name('pay_type_list')
                    ->alias("a")
                    ->join('__PAY_METHOD__ b','a.method_id=b.id','LEFT')
                    ->where(['a.method'=>13,'a.type_value'=>trim($order_info['liuyan'])])
                    ->field('a.type_name,b.name,b.id,b.method,b.money')->find();
                $method_money = 0.00;
                if( floatval( $pay_method['money'] ) > 0 ){
                    if( 0==intval( $pay_method['method'] ) ){
                        //金额
                        $method_money = $pay_method['money'];
                    }else{
                        //比例
                        $method_money = floatval($payAmount) * floatval($pay_method['money']) / 100;
                    }
                }
                $method_money = sprintf("%.2f",substr(sprintf("%.3f", $method_money), 0, -2));
                if( !Db::name('chongzhi_list')->where(['id'=>$order_info['id']])->update(['je'=>$payAmount,'hy_zsje'=>$zsje,'hy_zsbs'=>$zsbs,'hy_msje'=>$msje,'hy_msbs'=>$msbs,'method_money'=>$method_money]) ){
                    throw new Exception("更新订单信息金额错误");
                }

                $dml_set = Db::name('xt_dmsz')->where('id',1)->find();
                if( 1==$cz_set['dmopen'] ){
                    $dmls = (floatval($msje) + floatval($zsje) + floatval($payAmount)+ floatval($method_money)) * $dml_set['xscz_dmbs'];
                }else{
                    $dmls = floatval($payAmount) * $dml_set['xscz_dmbs'];
                }
                //充值后账户总金额
                $czhje = floatval($msje) + floatval($zsje) + floatval($payAmount)+ floatval($method_money) + floatval($user_info['je']);
                //充值总金额
                $czzje = floatval($payAmount) + floatval($user_info['czzje']);
                //用户当前打码量
                $dml = $user_info['dml'] + $dmls;

                if( !model('ChongzhiList')->updateRechargeInfo($off_order_no,$on_order_no,1,$czhje,time()) ){
                    throw new Exception("更新订单信息错误");
                }
                if( !model('Username')->upUserXsczInfo($czhje,$dml,$czzje,$order_info['username']) ){
                    throw new Exception("更新用户金额错误");
                }
                Db::name('username')->where('username',$order_info['username'])->setInc('cz_num');

                $fav_money = floatval($msje)+floatval($zsje)+ floatval($method_money);
                //满送金额，等级赠送金额，充值方案赠送金额
                $extcj = array(
                    'username'=>$user_info['username'],
                    'user_class'=>$user_info['us_class'],
                    'fstime'=>time(),
                    'czadmin' => '系统赠送',
                );
                $cjhje = floatval($payAmount) + floatval($user_info['je']) + floatval($msje);

                if( floatval($msje) > 0 ){
                    $extcj['beizhu'] = '系统赠送，充值满送金额';
                    $extcj['cjje'] = $msje;
                    $extcj['cjhje'] = $cjhje;
                    Db::name('caijin_list')->insert($extcj);
                }
                $cjhje += floatval($zsje);
                if( floatval($zsje) > 0 ){
                    $extcj['beizhu'] = '系统赠送，充值等级赠送金额';
                    $extcj['cjje'] = $zsje;
                    $extcj['cjhje'] = $cjhje;
                    Db::name('caijin_list')->insert($extcj);
                }
                $cjhje += floatval($method_money);
                if( floatval($method_money) > 0 ){
                    $extcj['beizhu'] = '系统赠送，充值方案赠送金额';
                    $extcj['cjje'] = $method_money;
                    $extcj['cjhje'] = $cjhje;
                    Db::name('caijin_list')->insert($extcj);
                }

                $data = array('username' =>$order_info['username'],'test'=>"您账户充值金额：{$payAmount}，赠送金额：{$fav_money}。已充值到账，请注意查收！",'xx_time'=>time(),'ifdq'=>0);
                Db::name('xiaoxi')->data($data)->insert();
                Db::commit();
                return self::jsonSuccess("充值成功");
            } catch (\Exception $e) {
                Db::rollback();
                return self::jsonError("充值失败");
            }
        }
    }
    public function hrefUrl(){
        $this->buildHtml("充值成功!");
    }
    public function hrefUrlThird(){
        $this->buildHtml("充值成功",1);
    }
    private static function getMillisecond(){
        list($msec, $sec) = explode(' ', microtime());
        $msectime =  (float)sprintf('%.0f', (floatval($msec) + floatval($sec)) * 1000);
        return $msectimes = substr($msectime,0,13);
    }
    private static function request_post($url,$data){ // 模拟提交数据函数
        $post_string = http_build_query($data);
        $options = array(
            'http' => array(
                'method' => 'POST',
                'header' => 'Content-type:application/x-www-form-urlencoded',
                'content' => $post_string,
                'timeout' => 15 * 60 // 超时时间
            )
        );
        $context = stream_context_create($options);
        $result = file_get_contents($url, false, $context);
        return $result;
    }
    //返回错误
    private static function jsonError($message = '',$url=null)
    {
        $return['msg'] = $message;
        $return['data'] = '';
        $return['code'] = -1;
        $return['url'] = $url;
        return json_encode($return);
    }

    //返回正确
    private static function jsonSuccess($message = '',$data = '',$url=null){
        $return['msg']  = $message;
        $return['data'] = $data;
        $return['code'] = 1;
        $return['url'] = $url;
        return json_encode($return);
    }
}